Voorbeeld van de functie Sgn

Dit voorbeeld maakt gebruik van de functie Sgn om na te gaan of een getal positief of negatief is.

Dim MyVar1, MyVar2, MyVar3, MySign
MyVar1 = 12: MyVar2 = -2,4: MyVar3 = 0
MySign = Sgn(MyVar1)    ' Resultaat is 1.
MySign = Sgn(MyVar2)    ' Resultaat is -1.
MySign = Sgn(MyVar3)    ' Resultaat is 0.